home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Present…ry 5: (Reseller Edition) / Apple Reference & Presentations Library 5.0 (Reseller Edition).iso / 6-Developer Demos / Developer Demos-Gen. / Mac Yellow Pages 1.0 / background_5634.txt < prev    next >
Text File  |  1990-08-17  |  7KB  |  335 lines
  1. -- background: 5634 from stack: in.0
  2. -- bmap block id: 6059
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: Help
  6. ----- HyperTalk script -----
  7. on openBackground
  8.   set userlevel to 4
  9. end openBackground
  10.  
  11. on closeBackground
  12.   set userlevel to 2
  13. end closeBackground
  14.  
  15. on mouseUp
  16.   beep
  17. end mouseUp
  18.  
  19. on arrowKey
  20.   -- do nothing
  21. end arrowKey
  22.  
  23.  
  24.  
  25. -- part 1 (field)
  26. -- low flags: 01
  27. -- high flags: 0000
  28. -- rect: left=2 top=3 right=21 bottom=452
  29. -- title width / last selected line: 0
  30. -- icon id / first selected line: 0 / 0
  31. -- text alignment: 0
  32. -- font id: 20
  33. -- text size: 12
  34. -- style flags: 2304
  35. -- line height: 16
  36. -- part name: Header
  37.  
  38.  
  39. -- part 2 (field)
  40. -- low flags: 01
  41. -- high flags: 0000
  42. -- rect: left=343 top=3 right=20 bottom=510
  43. -- title width / last selected line: 0
  44. -- icon id / first selected line: 0 / 0
  45. -- text alignment: 65535
  46. -- font id: 20
  47. -- text size: 12
  48. -- style flags: 2304
  49. -- line height: 16
  50. -- part name: Page Number
  51.  
  52.  
  53. -- part 5 (button)
  54. -- low flags: 00
  55. -- high flags: 0000
  56. -- rect: left=7 top=31 right=294 bottom=505
  57. -- title width / last selected line: 0
  58. -- icon id / first selected line: 0 / 0
  59. -- text alignment: 1
  60. -- font id: 0
  61. -- text size: 12
  62. -- style flags: 0
  63. -- line height: 16
  64. -- part name: Cover Button
  65. ----- HyperTalk script -----
  66. on mouseUp
  67.  
  68. end mouseUp
  69.  
  70.  
  71.  
  72. -- part 7 (button)
  73. -- low flags: 00
  74. -- high flags: 2000
  75. -- rect: left=426 top=256 right=277 bottom=487
  76. -- title width / last selected line: 0
  77. -- icon id / first selected line: 0 / 0
  78. -- text alignment: 1
  79. -- font id: 0
  80. -- text size: 12
  81. -- style flags: 0
  82. -- line height: 16
  83. -- part name: Cancel
  84. ----- HyperTalk script -----
  85. on mouseUp
  86.   global undoMemory
  87.   go to undoMemory
  88. end mouseUp
  89.  
  90.  
  91. -- part 8 (button)
  92. -- low flags: 00
  93. -- high flags: 2000
  94. -- rect: left=352 top=256 right=277 bottom=413
  95. -- title width / last selected line: 0
  96. -- icon id / first selected line: 0 / 0
  97. -- text alignment: 1
  98. -- font id: 0
  99. -- text size: 12
  100. -- style flags: 0
  101. -- line height: 16
  102. -- part name: Next
  103. ----- HyperTalk script -----
  104. on mouseUp
  105.   get the short name of this card
  106.   put last char of it into helpNumber
  107.   if helpNumber < 7 then
  108.     go to card "Help:  "&helpNumber+1
  109.   else
  110.     go to card "Help:  1"
  111.   end if
  112. end mouseUp
  113.  
  114.  
  115. -- part 9 (button)
  116. -- low flags: 00
  117. -- high flags: 2000
  118. -- rect: left=278 top=256 right=277 bottom=339
  119. -- title width / last selected line: 0
  120. -- icon id / first selected line: 0 / 0
  121. -- text alignment: 1
  122. -- font id: 0
  123. -- text size: 12
  124. -- style flags: 0
  125. -- line height: 16
  126. -- part name: Next
  127. ----- HyperTalk script -----
  128. on mouseUp
  129.   get the short name of this card
  130.   put last char of it into helpNumber
  131.   if helpNumber > 1 then
  132.     go to card "Help:  "&helpNumber-1
  133.   else
  134.     go to card "Help:  7"
  135.   end if
  136. end mouseUp
  137.  
  138.  
  139. -- part 21 (field)
  140. -- low flags: 01
  141. -- high flags: 0000
  142. -- rect: left=12 top=306 right=337 bottom=48
  143. -- title width / last selected line: 0
  144. -- icon id / first selected line: 0 / 0
  145. -- text alignment: 0
  146. -- font id: 3
  147. -- text size: 12
  148. -- style flags: 0
  149. -- line height: 16
  150. -- part name: 
  151. ----- HyperTalk script -----
  152. on mouseUp
  153.   go to card "Help:  0"
  154. end mouseUp
  155.  
  156.  
  157. -- part 22 (field)
  158. -- low flags: 01
  159. -- high flags: 0000
  160. -- rect: left=176 top=306 right=337 bottom=212
  161. -- title width / last selected line: 0
  162. -- icon id / first selected line: 0 / 0
  163. -- text alignment: 0
  164. -- font id: 3
  165. -- text size: 12
  166. -- style flags: 0
  167. -- line height: 16
  168. -- part name: 
  169. ----- HyperTalk script -----
  170. on mouseUp
  171.   go to card "Help:  1"
  172. end mouseUp
  173.  
  174.  
  175. -- part 23 (field)
  176. -- low flags: 01
  177. -- high flags: 0000
  178. -- rect: left=217 top=306 right=337 bottom=253
  179. -- title width / last selected line: 0
  180. -- icon id / first selected line: 0 / 0
  181. -- text alignment: 0
  182. -- font id: 3
  183. -- text size: 12
  184. -- style flags: 0
  185. -- line height: 16
  186. -- part name: 
  187. ----- HyperTalk script -----
  188. on mouseUp
  189.   go to card "Help:  2"
  190. end mouseUp
  191.  
  192.  
  193. -- part 24 (field)
  194. -- low flags: 01
  195. -- high flags: 0000
  196. -- rect: left=299 top=306 right=337 bottom=335
  197. -- title width / last selected line: 0
  198. -- icon id / first selected line: 0 / 0
  199. -- text alignment: 0
  200. -- font id: 3
  201. -- text size: 12
  202. -- style flags: 0
  203. -- line height: 16
  204. -- part name: 
  205. ----- HyperTalk script -----
  206. on mouseUp
  207.   go to card "Help:  3"
  208. end mouseUp
  209.  
  210.  
  211. -- part 25 (field)
  212. -- low flags: 01
  213. -- high flags: 0000
  214. -- rect: left=381 top=306 right=337 bottom=417
  215. -- title width / last selected line: 0
  216. -- icon id / first selected line: 0 / 0
  217. -- text alignment: 0
  218. -- font id: 3
  219. -- text size: 12
  220. -- style flags: 0
  221. -- line height: 16
  222. -- part name: 
  223. ----- HyperTalk script -----
  224. on mouseUp
  225.   go to card "Help:  3"
  226. end mouseUp
  227.  
  228.  
  229. -- part 26 (field)
  230. -- low flags: 01
  231. -- high flags: 0000
  232. -- rect: left=422 top=306 right=337 bottom=458
  233. -- title width / last selected line: 0
  234. -- icon id / first selected line: 0 / 0
  235. -- text alignment: 0
  236. -- font id: 3
  237. -- text size: 12
  238. -- style flags: 0
  239. -- line height: 16
  240. -- part name: 
  241. ----- HyperTalk script -----
  242. on mouseUp
  243.   go to card "Help:  4"
  244. end mouseUp
  245.  
  246.  
  247. -- part 27 (field)
  248. -- low flags: 01
  249. -- high flags: 0000
  250. -- rect: left=340 top=306 right=337 bottom=376
  251. -- title width / last selected line: 0
  252. -- icon id / first selected line: 0 / 0
  253. -- text alignment: 0
  254. -- font id: 3
  255. -- text size: 12
  256. -- style flags: 0
  257. -- line height: 16
  258. -- part name: 
  259. ----- HyperTalk script -----
  260. on mouseUp
  261.   go to card "Help:  4"
  262. end mouseUp
  263.  
  264.  
  265. -- part 28 (field)
  266. -- low flags: 01
  267. -- high flags: 0000
  268. -- rect: left=53 top=306 right=337 bottom=89
  269. -- title width / last selected line: 0
  270. -- icon id / first selected line: 0 / 0
  271. -- text alignment: 0
  272. -- font id: 3
  273. -- text size: 12
  274. -- style flags: 0
  275. -- line height: 16
  276. -- part name: 
  277. ----- HyperTalk script -----
  278. on mouseUp
  279.   go to card "Help:  5"
  280. end mouseUp
  281.  
  282.  
  283. -- part 29 (field)
  284. -- low flags: 01
  285. -- high flags: 0000
  286. -- rect: left=463 top=306 right=337 bottom=499
  287. -- title width / last selected line: 0
  288. -- icon id / first selected line: 0 / 0
  289. -- text alignment: 0
  290. -- font id: 3
  291. -- text size: 12
  292. -- style flags: 0
  293. -- line height: 16
  294. -- part name: 
  295. ----- HyperTalk script -----
  296. on mouseUp
  297.   go to card "Help:  6"
  298. end mouseUp
  299.  
  300.  
  301. -- part 30 (field)
  302. -- low flags: 01
  303. -- high flags: 0000
  304. -- rect: left=94 top=306 right=337 bottom=130
  305. -- title width / last selected line: 0
  306. -- icon id / first selected line: 0 / 0
  307. -- text alignment: 0
  308. -- font id: 3
  309. -- text size: 12
  310. -- style flags: 0
  311. -- line height: 16
  312. -- part name: 
  313. ----- HyperTalk script -----
  314. on mouseUp
  315.   go to card "Help:  7"
  316. end mouseUp
  317.  
  318.  
  319. -- part 31 (field)
  320. -- low flags: 01
  321. -- high flags: 0000
  322. -- rect: left=258 top=306 right=336 bottom=294
  323. -- title width / last selected line: 0
  324. -- icon id / first selected line: 0 / 0
  325. -- text alignment: 0
  326. -- font id: 3
  327. -- text size: 12
  328. -- style flags: 0
  329. -- line height: 16
  330. -- part name: 
  331. ----- HyperTalk script -----
  332. on mouseUp
  333.   go to card "Help:  4"
  334. end mouseUp
  335.